object Speaker_Form: TSpeaker_Form Left = 232 Top = 264 Hint = 'Play a single tone' BorderStyle = bsDialog Caption = 'Speaker' ClientHeight = 129 ClientWidth = 323 Color = clInactiveCaptionText Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = form_OnCreate PixelsPerInch = 96 TextHeight = 13 object freq_label: TLabel Left = 116 Top = 12 Width = 84 Height = 13 Caption = 'Frequency (Hertz)' end object dura_label: TLabel Left = 116 Top = 44 Width = 106 Height = 13 Caption = 'Duration (Milliseconds)' end object Shape2: TShape Left = 0 Top = 64 Width = 321 Height = 1 Enabled = False end object Chime_butten: TButton Left = 16 Top = 96 Width = 67 Height = 25 Hint = 'Play a chime' Caption = 'Play Chime' TabOrder = 0 OnClick = Chime_buttenClick end object Tone_Butten: TButton Left = 16 Top = 24 Width = 65 Height = 25 Caption = 'Play Tone' TabOrder = 1 OnClick = Tone_ButtenClick end object Frequency: TEdit Left = 240 Top = 8 Width = 69 Height = 21 TabOrder = 2 Text = '440' end object Duration: TEdit Left = 240 Top = 40 Width = 69 Height = 21 TabOrder = 3 Text = '1000' end object Exit_Butten: TButton Left = 240 Top = 96 Width = 67 Height = 25 Hint = 'Exit the program' Caption = 'Exit' TabOrder = 4 OnClick = Exit_ButtenClick end object About_Butten: TButton Left = 128 Top = 96 Width = 65 Height = 25 Caption = 'About' TabOrder = 5 OnClick = About_ButtenClick end end